home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / ASP / ASPapp Portal / navigation.asp < prev    next >
Encoding:
Text File  |  2002-03-12  |  884 b   |  48 lines
  1. <%
  2. %>
  3. <%
  4.  
  5.  
  6.  
  7.  
  8.  
  9. do_search = request("do_search")
  10. ''' request form keys
  11. ''' request action
  12. action = lcase(request("action"))
  13. ''' action case handler
  14. select case action
  15.  
  16. end select
  17.  
  18. '  no action was specified, so handle the default case(s)
  19.  
  20. %>
  21.  
  22.  
  23. <table class='menuTable' cellpadding=5 bgcolor="#555555" cellspacing=1>
  24. <tr>
  25.     <td class='menuTD' >
  26.         <a class=menuFont href="content.asp">Articles</a>
  27.     </td>
  28.     <td class='menuTD' >
  29.         <a class=menuFont href="links_yahoo.asp">Resources</a>
  30.     </td>
  31.     <td class='menuTD' >
  32.         <a class=menuFont href="forums.asp">Forums</a>
  33.     </td>
  34.     <td class='menuTD' >
  35.         <a class=menuFont href="classifieds.asp">Classifieds</a>
  36.     </td>
  37.     <td class='menuTD' >
  38.         <a class=menuFont href="surveys.asp">What do you think?</a>
  39.     </td>
  40.     <td class='menuTD' >
  41.         <a class=menuFont href="login.asp">Login</a>
  42.     </td>
  43. </tr>
  44.  
  45. </table>
  46.  
  47.  
  48.